macro CommentSingleLine()
{
	hbuf = GetCurrentBuf()
    ln = GetBufLnCur(hbuf)
    str = GetBufLine (hbuf, ln)
    str = cat("/** ",str)
    str = cat(str," **/")
    PutBufLine (hbuf, ln, str)
}


